home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Collections: Purity
/
Purity #34 (1994-08)(Diesel)(DE)[WB].zip
/
Purity #34 (1994-08)(Diesel)(DE)[WB].adf
/
IncludesPCQ
/
gfxbase.i
< prev
next >
Wrap
Text File
|
1994-08-06
|
4KB
|
115 lines
{
GfxBase.i for PCQ Pascal
}
{$I "Include:Exec/Lists.i"}
{$I "Include:Exec/Libraries.i"}
{$I "Include:Exec/Interrupts.i"}
{$I "Include:exec/Semaphores.i"}
{$I "Include:Graphics/Monitor.i"}
type
GfxBaseRec = record
LibNode : Library;
ActiView : Address; { ViewPtr }
copinit : Address; { (copinitptr) ptr to copper start up list }
cia : Address; { for 8520 resource use }
blitter : Address; { for future blitter resource use }
LOFlist : Address;
SHFlist : Address;
blthd,
blttl : Address;
bsblthd,
bsblttl : Address; { Previous four are (bltnodeptr) }
vbsrv,
timsrv,
bltsrv : Interrupt;
TextFonts : List;
DefaultFont : Address; { TextFontPtr }
Modes : Short; { copy of current first bplcon0 }
VBlank : Byte;
Debug : Byte;
BeamSync : Short;
system_bplcon0 : Short; { it is ored into each bplcon0 for display }
SpriteReserved : Byte;
bytereserved : Byte;
Flags : Short;
BlitLock : Short;
BlitNest : Short;
BlitWaitQ : List;
BlitOwner : Address; { TaskPtr }
TOF_WaitQ : List;
DisplayFlags : Short; { NTSC PAL GENLOC etc}
{ Display flags are determined at power on }
SimpleSprites : Address; { SimpleSpritePtr ptr }
MaxDisplayRow : Short; { hardware stuff, do not use }
MaxDisplayColumn : Short; { hardware stuff, do not use }
NormalDisplayRows : Short;
NormalDisplayColumns : Short;
{ the following are for standard non interlace, 1/2 wb width }
NormalDPMX : Short; { Dots per meter on display }
NormalDPMY : Short; { Dots per meter on display }
LastChanceMemory : Address; { SignalSemaphorePtr }
LCMptr : Address;
MicrosPerLine : Short; { 256 time usec/line }
MinDisplayColumn : Short;
ChipRevBits0 : Byte;
crb_reserved : Array[0..4] of Byte;
monitor_id : Short; { normally null }
hedley : Array[0..7] of Integer;
hedley_sprites : Array[0..7] of Integer; { sprite ptrs for intuition mouse }
hedley_sprites1 : Array[0..7] of Integer; { sprite ptrs for intuition mouse }
hedley_count : Short;
hedley_flags : Short;
hedley_tmp : Short;
hash_table : Address;
current_tot_rows : Short;
current_tot_cclks : Short;
hedley_hint : Byte;
hedley_hint2 : Byte;
nreserved : Array[0..3] of Integer;
a2024_sync_raster : Address;
control_delta_pal : Short;
control_delta_ntsc : Short;
current_monitor : MonitorSpecPtr;
MonitorList : List;
default_monitor : MonitorSpecPtr;
MonitorListSemaphore : SignalSemaphorePtr;
DisplayInfoDataBase : Address;
ActiViewCprSemaphore : SignalSemaphorePtr;
UtilityBase : Address; { for hook AND tag utilities }
ExecBase : Address; { to link with rom.lib }
end;
GfxBasePtr = ^GfxBaseRec;
const
NTSC = 1;
GENLOC = 2;
PAL = 4;
TODA_SAFE = 8;
BLITMSG_FAULT = 4;
{ bits defs for ChipRevBits }
GFXB_BIG_BLITS = 0;
GFXB_HR_AGNUS = 0;
GFXB_HR_DENISE = 1;
GFXF_BIG_BLITS = 1;
GFXF_HR_AGNUS = 1;
GFXF_HR_DENISE = 2;
GRAPHICSNAME = "graphics.library";